home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Club KidSoft Volume 3 #2
/
CKSPCV32.BIN
/
movies
/
clubart.dir
/
00036_Script_end Animation
< prev
next >
Wrap
Text File
|
1995-04-06
|
2KB
|
73 lines
on enterFrame
global gArtPlay
-- position the sprites
if ( gArtPlay = FALSE) then
-- put "test butt"
testClubArtButtons
else
advanceArt
end if
end
--**********************************************************************
on mouseDown
global gArtPlay
if ( gArtPlay = FALSE) then
testDownClubArtButtons
end if
end
--**********************************************************************
-------------------------------------
-- move the sprites around
-------------------------------------
on mouseUp
global gArtPlay
if (gArtPlay = FALSE) then
moveSpritesClubArt
testUpClubArtButtons
end if
end
--**********************************************************************
on exitFrame
global gArtPlay
global gArtPlayFirstTime
--- put "done" && gArtPlayFirstTime
if(gArtPlayFirstTime = TRUE) then -- turn on puppets
global gArtSprite1
global gArtSprite2
global gArtSprite3
global gArtSprite4
set the puppet of sprite gArtSprite1 to TRUE
set the puppet of sprite gArtSprite2 to TRUE
set the puppet of sprite gArtSprite3 to TRUE
set the puppet of sprite gArtSprite4 to TRUE
-- set the moveableSprite of sprite gArtSprite1 to TRUE
-- set the moveableSprite of sprite gArtSprite2 to TRUE
-- set the moveableSprite of sprite gArtSprite3 to TRUE
end if
set gArtPlayFirstTime to FALSE
if gArtPlay >=3 or not soundBusy(1) then
set gArtPlay to FALSE
go to the frame
else if gArtPlay = FALSE then
go to the frame
else
set gArtPlay = gArtPlay + 1
go to marker(0) + 2 -- loop
end if
end